home *** CD-ROM | disk | FTP | other *** search
/ Celestin Apprentice 5 / Apprentice-Release5.iso / Environments / PowerMacOberon feb96 / System / Packager.Obj < prev    next >
Encoding:
Text File  |  1996-01-25  |  8.1 KB  |  8 lines  |  [TEXT/.Ob4]
  1. ¯6Ú ˇ‡p≈T5ü¬,PackagerÇ∫Îk:ï>^nÇÉComposeÎDecomposekExtractList:ÑÖ$Œ±In$ !Texts<
  2. ‡4Out$…¢ãFilesܡˇ˚Vˇ˛˙Ì˙‘ ˙fl˝9˙ı
  3. ˛i˙˛˛9˙–˛˙º˙∑¸ ¸V¸4˙w˙Q ˙Y˙Tá, offset: , length:  entries. contains  is no package.PackagePackageà|¶ø¡ˇ¯êî!ˇ¿;·8êA;√Äbˇ¯ÄBˇ‡HÄAûê~û8`∞~ûûÄûêûÄÄ!|¶ª¡ˇ¯O‡ |¶ø°ˇÙêî!ˇ∏;·8êA;√;§Äbˇ¯ÄBˇ‡Kˇˇ›ÄAûÄæÖêeûÄfiÜÄÊáìßûûÅàÅ(ë>û©^1j±~ÄÄ!|¶ª°ˇÙO‡ ø¡ˇ¯î!ˇ¿;·8;√ûûÅûÄ~|åAÊDûûÄûÑħêæû®fi0Êˇˇ∞˛ûÄ~ÉÄcC‡C‡ 8`C‡‡Ä!ª¡ˇ¯O‡ ø¡ˇ¯î!ˇ¿;·8;√ûûÅÅ>H}@&UCfl˛C‡‡Ä!ª¡ˇ¯O‡ ø°ˇÙî!ˇ∏;·8;£;ƒÅ}Åùã`A˛Ä}ÉÄcC‡C‡ 8`C‡‡Ä!ª°ˇÙO‡ øÅˇî!ˇ∏;·8;£;ƒ;ÖÄ}|úAÊúÄ|C‡C‡ 8`C‡‡Ä!ªÅˇO‡ |¶øAˇËêî!ˇ†;·@êA;£;ƒ;e;Ü;@|∫‡|õ–Æ/A˙ 3ZC‡ˇÏ0öÑ0dêüˇ¸ÄBˇ‡HÄAÄüˇ¸êÉ ê}ÄΩÖÅ }    ¶9;à…8B@P/ÜA˛HåÈú≈B@4/áA˛,å…úÂB@ /ÜA˛åÈú≈B@ /Ü@˛ˇ‹òC‡òÄ(Ä!|¶ªAˇËO‡ øÅˇî!ˇ∞;·8;£;ƒ;Ä|º}]‡Æ,äAÊ|º}}‡Æ/ .A˙ 3úC‡ˇ‹|º9Ä.}ù·Æ0||£8ÄO|ùÆ0º|•8¿b|›)Æ0¸|ß9j}9Æ1<|©9@}]IÆÄ!ªÅˇO‡ øÅˇî!ˇ∞;·8;£;ƒ;Ä|º}}‡Æ/ãA˛|º}ù‡Æ,å.AÊ 3úC‡ˇ‹|º8`|}·ÆÄ!ªÅˇO‡ |¶øÅˇêî!ˇ∞;·8êA;£;ƒ;Ö≥ü8}8û8ø8¿8‡ÄBˇHÄAÄ Ä!|¶ªÅˇO‡ |¶øÅˇêî!ˇ∞;·8êA;£;ƒ;Öìü8}8û8ø8¿8‡ÄBˇKˇ˚çÄAÄ Ä!|¶ªÅˇO‡ |¶øÅˇêî!ˇ∞;·8êA;£;ƒ;Ö8}8û8ø8¿8‡ÄBˇHÄA©_±\Ä Ä!|¶ªÅˇO‡ |¶øÅˇêî!ˇ∞;·8êA;£;ƒ;Ö8}8û8ø8¿8‡ÄBˇKˇ˙ŸÄAÅë|Ä Ä!|¶ªÅˇO‡ |¶øAˇËêî!ˇ®;·8êA;£;ƒ;Ö;F;g8û8}ÄBˇHÄAê|Åú/ @˙ 8`C‡Ñ8z8õĺ8¿ÄBˇHÄA8z8õ8øÄBˇHÄAà/ɢA˛ 8`C‡<8z8õ8øÄBˇKˇ˘—ÄAàü,Ñ1AÊ 8`C‡8`C‡‡Ä(Ä!|¶ªAˇËO‡ |¶øaˇÏêî!ˇ∞;·8êA;√;Ñ;•;f8bˇÿ8ÄÄBˇHÄAê~8|8ùÄæ8¿ÄBˇKˇ˘ÈÄA8|8ù8†˘ÄBˇHÄA8|8ù8†1ÄBˇKˇ¯˝ÄA8†êªÄ Ä!|¶ªaˇÏO‡ |¶øaˇÏêî!ˇ∞;·8êA;√;Ñ;•;f8~ÄBˇHÄA8bˇ–8Ä8›8º8˚ÄBˇHÄAÄ Ä!|¶ªaˇÏO‡ |¶ø!ˇ‰êî!ˇ0;·@êA;¿;Ä;`;@; ì?$ì?ì?ÄBˇ‰HÄA888Ä%ÄBˇ‰HÄA888Ä%Kˇ˚—ÄbˇÙÄBˇ‡KˇˇuÄA;C8zKˇ˜Ÿ88üĬˇĶˇÙ8fl4Kˇ˛Y;†Äˇ41ë4Å"ˇ‰âI/
  4. A˙¯Äbˇ¸ÄBˇ‡Kˇ˜ÈÄA;É3Ωú8|Äúˇ¸8ø88¿%ġ¥|    ¶ÄDˇ∏O‡!ÄA888Ä%Kˇ˙ô888Ä%ÄBˇKˇ˙ÄA;√/û@˛9`ôbC‡ 8z8úÅɡ¸Ä ˇ§|    ¶ÄLˇ®O‡!ÄAú8~ÄBˇHÄAê|úÄ|ÉÄü4Ä£ |ƒ*0Êêˇ4888Ä%ÄBˇ‰Kˇ¯ÄA888Ä%Kˇ˙çC‡ˇ8ÅˇÄàˇÙ8ΩKˇ˙Õö8zÄöˇ¸Äˇú|    ¶ÄDˇ†O‡!ÄA;c,õAÊ¥8Å"ˇÄâˇÙõĪÖÄ•ÖÄ≈ 8•ÄBˇHÄA8ÅBˇÄäˇÙõĪÖÄ•Kˇ˙©8ÅbˇÄãˇÙÄø4Kˇ˙ïõÅõåÄ4Äå|£"êø4ö8zÄöˇ¸8ªÄˇî|    ¶ÄDˇòO‡!ÄA;cC‡ˇL8zÄ√ˇ¸Äˇ¨|    ¶ÄFˇ∞O‡!ÄA „/A˙d8zÅˇ¸Äˇ¥|    ¶ÄHˇ∏O‡!ÄA;ÉúÅ<â9Ä%}â¶88çI8B@P/äA˛HçiôCB@4/ãA˛,çIùcB@ /äA˛çiùCB@ /ä@˛ˇ‹òC‡ò888Ä%Kˇ¯9888Ä%ÄBˇKˇ˜EÄA;√8ÄǡÄÑˇÙ8æ8¿ÄBˇKˇ˘ÄAúÄ‹Ü0fêflˇ¸ÄBˇ‡Kˇ˝UÄAÄflˇ¸ê√ ;#8Ä‚ˇÄáˇÙôÄŸ 8πúĸÄBˇKˇ˙yÄA8ÅˇÄàˇÙôÄŸ 8πúĸÄBˇKˇ˚1ÄAC‡˛|Ä8ü88†%8fl2Kˇ˚a©?2,â}@&UK?˛ôbÄòÄ!|¶ª!ˇ‰O‡ |¶ø!ˇ‰}Ä&êëÅî!˛†;·@êA; ì?–ì?ºì?∞ì?¨ÄBˇ‰Kˇ¯ÄA88Ä%ÄBˇ‰Kˇˆ¡ÄA88Ä%Kˇ˜u8T8Ä%ÄBˇ‰KˇÛ©ÄA8T8Ä%KˇˆΩ8|8Ä%ÄBˇ‰KˇÛâÄA8|8Ä%Kˇˆù8T8Ä%8ø¨8fl¥Ä‚ˇÄÁˇÙKˇ¯È!/A˙9 ô"C‡¥8¥ÅBˇÄäˇÙ8ø¶Kˇ˜˝N`Ç;†AÛ‘©¶ùXA˝»8¥ÅǡÄåˇÙÄBˇHÄA;c8¥ÄǡÄÑˇÙ8ø,8¿%ÄBˇHÄA8¥Ä¢ˇÄÖˇÙ8ø‰Kˇ˜ı8¥Ä¬ˇÄܡÙ8ø‡Kˇ˜·8¥Ä‚ˇÄáˇÙÄBˇKˇÚÂÄA;C9,9?9Hˇˇ9iˇˇ9Ä|j`Ó|ã`Ó|É @Ê,É@ÊˇÏ|É @Ê N`BC‡3ΩC‡ˇ0@Û†8∞8ü»Ä¢ˇÄ•ˇÙ8fl‹Kˇ¯±8»Ä¬ˇÄÜˇÙ®ˇ¶0ߡˇKˇˆ5Å‹1(ë?‹;¿8¥ÅBˇÄäˇÙÄø¨Äfl‹ÄBˇKˇÙ¡ÄA©¶XA˘‰8¥ÅǡÄåˇÙ8ø,8¿%ÄBˇKˇÚ¡ÄA8¥ÄǡÄÑˇÙ8øËKˇˆ›8¥Ä¢ˇÄÖˇÙ8øKˇˆ…ûËA˛88»Ä¬ˇÄܡÙ8ø,8¿%ÄBˇKˇˆ=ÄA8»Ä‚ˇÄáˇÙÄøËKˇı—|ûË@‰$8»ÅˇÄàˇÙ};–Å_|©PKˇı≠C‡0Ë@˘(8»ÅbˇÄãˇÙ}õ–Äø|Ã(ġ‰|ß0Kˇı}3fiC‡ˇ8¥ÅˇÄàˇÙÄBˇKˇÚÅÄAÅ?‡ÉH/ú@˝pú0|ÄBˇ‡KˇÙ°ÄAìÉ ;#8¥ÅBˇÄäˇÙôÄŸ 8π8¸ÄBˇKˇÙiÄA8»ÅbˇÄãˇÙôÄŸ 8π8¸ÄBˇKˇÙ=ÄA8¥ÅǡÄåˇÙÄø¨Äfl‡Äˇ‰|Δ:ÄBˇKˇÒ’ÄAĨÄBˇKˇˆ˘ÄAŇ}(Å_‰äH,ú@Âpú0|ÄBˇ‡Kˇ≠ÄAìÉ ;#8¥ÅbˇÄãˇÙôÄŸ 8π8¸ÄBˇKˇ}ÄA8»ÅǡÄåˇÙôÄŸ 8π8¸ÄBˇKˇUÄAÄ∞8ü|8†%8fl®Kˇˆ¡88Ä%KˇÚπ88Ä%ÄBˇKˇ˘5ÄAê∞8»ÄǡÄÑˇÙÄø∞8¿ÄBˇKˇ-ÄA8¥Ä¢ˇÄÖˇÙÄø¨Äfl‡ÄBˇKˇÔAÄAÄfl‰Ü0fêflˇ¸ÄBˇ‡KˇÔÒÄAÄflˇ¸ê√ ;#8¥Ä‚ˇÄáˇÙôÄŸ 8πġ‰ÄBˇKˇÔ¡ÄA8»ÅˇÄàˇÙôÄŸ 8πġ‰ÄBˇKˇÔôÄAÄ∞ÄBˇKˇ¯ëÄA©?®/    @˙@Û 9@C‡9@ôBÄ(Å$Ä!|¶}oÒ ª!ˇ‰O‡ |¶ø!ˇ‰êî!ˇ;·@êA;¿;†;`;@ì_Äì_lì_\ÄBˇ‰KˇÛΩÄA8 8Ä%ÄBˇ‰KˇÛiÄA8 8Ä%KˇÒ=8 8Ä%8ø\8fldÅǡÄÏˇÙKˇÛâ c/ÉA˛8ÄòÇC‡òÄbˇÙÄBˇ‡Kˇ˜ïÄA;£8}KˇÌ©8dÄ¢ˇÄÖˇÙ8øKˇÚÅ´?;Ä|ú»AÂ∏8dĬˇÄܡÙ8ø48¿%ÄBˇKˇÒ©ÄAÄbˇ¸ÄBˇ‡KˇÌπÄA;√8}8ûÄ„ˇ¸Äˇ§|    ¶ÄGˇ®O‡!ÄAû8~Äûˇ¸8ø48¿%ġ¥|    ¶ÄDˇ∏O‡!ÄA8dÅˇÄàˇÙû8æKˇÚ=8dÅ"ˇÄâˇÙû8æKˇÚ%3úC‡ˇH8}ÅCˇ¸Ä
  5. ˇ¨|    ¶ÄJˇ∞O‡!ÄA!c/ A˙t8}Åɡ¸Ä ˇ¥|    ¶ÄLˇ∏O‡!ÄA;√ûÄ~É8¿%|…¶8ˇ4åÉ8B@P/ÑA˛Hå£òáB@4/ÖA˛,åÉúßB@ /ÑA˛å£úáB@ /Ñ@˛ˇ‹òC‡ò848Ä%KˇÔM848Ä%ÄBˇKˇÔeÄA;c8xÅˇÄàˇÙ8ª8¿ÄBˇKˇÔ!ÄAûÅ>â0ië?ˇ¸ÄBˇ‡KˇÔÄAÅ?ˇ¸ë# ;C8dÅBˇÄäˇÙöÄ⁄ 8∫ûIJÄBˇKˇÓ—ÄA8xÅbˇÄãˇÙöÄ⁄ 8∫ûIJÄBˇKˇÓ©ÄA8{ÄBˇKˇÓôÄAC‡˛l9ÄôÇÄ¿Ä!|¶ª!ˇ‰O‡ |¶ø°ˇÙêî!ˇ@;·8êA8êhê\ÄBˇ‰KˇÓÄA88Ä%ÄBˇ‰KˇÓ    ÄA88Ä%KˇÓÄBˇÏHÄA88Ä%ÄBˇÏHÄA88Ä%8ø\8fl`Ä‚ˇÄÁˇÙKˇ=!,àAÊ$8bˇ¿8ÄÄBˇÏKˇÍ±ÄA9 ô"C‡88`ÅBˇÄäˇÙ8øNKˇÔ=8bˇ¥8Ä ÄBˇÏKˇÍuÄA®N8ÄÄBˇÏHÄA8bˇ®8Ä
  6. ÄBˇÏKˇÍAÄAÄBˇÏKˇÍ≈ÄA´øN;¿ËA˘ƒ8`ÅbˇÄãˇÙ8ø(8¿%ÄBˇKˇÌiÄA8`ÅǡÄåˇÙ8øTKˇÔ8`ÄǡÄÑˇÙ8øXKˇÓ˝8(8Ä%ÄBˇÏKˇÍÄA8bˇú8Ä ÄBˇÏKˇÈ°ÄAÄT8ÄÄBˇÏKˇÍ-ÄA8bˇê8Ä ÄBˇÏKˇÈçÄAÄX8ÄÄBˇÏKˇÈyÄAÄBˇÏKˇÍÄA3fiC‡ˇ<8†ò¢ÄêÄ!|¶ª°ˇÙO‡ |¶ø·ˇ¸êî!ˇ¿;·8êAÄÄ!|¶ª·ˇ¸O‡ â ˇ¸ˇˇˇˇEntryDescˇ¯ˇˇˇˇQueueElementDesc ˇÙˇˇˇˇFIFOQueueDesc
  7.     ä %')+-/025BCHIKNRTZbcjx~ãë†ß±◊€·ÂÈÌÒ˝†?EG[ikmvxÄÇ᧶“‘‡„ÎÓ“‹Ê ;GQµ¬»fl·&)ã¯8InitFIFOQueueq·{t¯>8FIFOQueue.Enqueuee‚{|q·{t¯fi8FIFOQueue.Dequeueq·{t¯Ó8FIFOQueue.Emptyq·{t¯Ç8FIFOQueueDesc.Firstq‚{t¯ï8FIFOQueueDesc.Nextq‚{tthis„{x¯— ¿EntryDesc.SetNamee‚{|iÂ{n‰{¯˜8AppendObji„{n‚{¯ç8SkipObji„{n‚{¯§8WriteIntR‚{tcx„{¯ª8WriteLIntR‚{tcx„{¯”8ReadIntR‚{tbx„{¯Î8ReadLIntR‚{tbx„{¯¶ 8OpenPackagechf„{xpackage‚{rÂ{t¯–8CreatePackagecurrPos‰{fdst·{xrdst„{t¯Î8ClosePackagef·{xpackage„{res‰{¯Éê¿ComposebufÊ{currPos4e„{|entriesÂ{tfdstxfsrc·{xmodule8%nofEntries‚{qelem‰{xrdsttres2rsrct¯Î†¿ExtractbufÊ{copyLen„{currPos‹extrI‚{extrLen‰extrOffset‡extract%fdst∞xfsrc¨xi·{inPackageå{lenËmodule,%newPackage¸%nofEntries¶offsetpackage‘%pos1‰{pos2Â{rdst»tres®rsrc¥t¯∫
  8. ∏¿Decompose@forÊ{bufÂ{entries‚{tentry·{|fdst‰{xfsrc‹xi„{module4%nofEntriespackage %rdst¯trsrc‰t¯∫ à8List@for‚{fsrc‹xi·{len‘module(%nofEntriesŒoffsetÿpackage%rsrc‡t¯≈ 8$$done˜ EntryDescnamelenoffset˜ QueueElementDescentry|nextx˜FIFOQueueDescnheadxtailx